Thema Datum  Von Nutzer Rating
Antwort
29.11.2018 12:32:51 Manu
Solved
29.11.2018 13:06:59 Werner
NotSolved
29.11.2018 13:29:54 Manu
Solved
Blau Dropdownauswahl -> Inputbox -> Zelle ausfüllen
 29.11.2018 13:36:35 Werner
*****
NotSolved
29.11.2018 13:54:17 Gast87054
Solved

Ansicht des Beitrags:
Von:
Werner		 Datum:
29.11.2018 13:36:35		 Views:
467		 Rating:
     
Antwort:
  Ja
Thema:
Dropdownauswahl -> Inputbox -> Zelle ausfüllen

Hallo Manu,

der Code gehört ins Codemodul des Tabellenblattes, auf dem er sich auswirken soll.

Rechtsklick auf den Tabellenblattreiter - Code anzeigen - Code rechts ins Codefenster kopieren.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim varWert As Variant

If Target.Column <> 1 Then Exit Sub
If Target.Value = "Unvollständig" Then
    varWert = Application.InputBox("Bitte eine Zahl eingeben:", "Zahl eintragen", Type:=1)
    If varWert <> False Then
        Target.Offset(, 8) = varWert
    End If
End If

End Sub

 

Gruß Werner

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
29.11.2018 12:32:51 Manu
Solved
29.11.2018 13:06:59 Werner
NotSolved
29.11.2018 13:29:54 Manu
Solved
Blau Dropdownauswahl -> Inputbox -> Zelle ausfüllen
 29.11.2018 13:36:35 Werner
*****
NotSolved
29.11.2018 13:54:17 Gast87054
Solved